object formNewRunValue: TformNewRunValue Left = 300 Top = 250 BorderStyle = bsDialog BorderWidth = 4 Caption = 'New Run value' ClientHeight = 278 ClientWidth = 323 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False PopupMode = pmAuto Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object radiogroupRootKey: TRadioGroup Left = 0 Top = 0 Width = 323 Height = 65 Align = alTop Caption = ' Valid for... (root key) ' ItemIndex = 0 Items.Strings = ( 'Create for current user only (HKEY_CURRENT_USER)' 'Create for all users (HKEY_LOCAL_MACHINE)') TabOrder = 0 end object radiogroupKey: TRadioGroup Left = 0 Top = 73 Width = 323 Height = 88 Align = alTop Caption = ' Type of program (key) ' ItemIndex = 0 Items.Strings = ( 'Create a link to a normal program (Run)' 'Create a link to a service program (RunServices)' 'Create a Autostart group link') TabOrder = 1 end object panelButtons: TPanel Left = 0 Top = 244 Width = 323 Height = 34 Align = alBottom BevelOuter = bvNone TabOrder = 3 DesignSize = ( 323 34) object buttonCancel: TBitBtn Left = 224 Top = 8 Width = 91 Height = 25 Anchors = [akTop, akRight] TabOrder = 0 Kind = bkCancel end object buttonOK: TBitBtn Left = 120 Top = 8 Width = 91 Height = 25 Anchors = [akTop, akRight] TabOrder = 1 Kind = bkOK end end object Panel2: TPanel Left = 0 Top = 65 Width = 323 Height = 8 Align = alTop BevelOuter = bvNone TabOrder = 4 end object Panel3: TPanel Left = 0 Top = 161 Width = 323 Height = 8 Align = alTop BevelOuter = bvNone TabOrder = 5 end object groupValueData: TGroupBox Left = 0 Top = 169 Width = 323 Height = 75 Align = alClient Caption = ' Registry entry (value && data) ' TabOrder = 2 DesignSize = ( 323 75) object labelValue: TLabel Left = 8 Top = 20 Width = 62 Height = 13 Caption = 'Name of link:' end object labelData: TLabel Left = 8 Top = 40 Width = 51 Height = 13 Caption = 'Linked file:' end object eValue: TEdit Left = 112 Top = 16 Width = 198 Height = 21 Anchors = [akLeft, akTop, akRight] TabOrder = 0 end object eData: TEdit Left = 112 Top = 40 Width = 179 Height = 21 Anchors = [akLeft, akTop, akRight] TabOrder = 1 end object buttonBrowse: TButton Left = 290 Top = 40 Width = 21 Height = 21 Anchors = [akTop, akRight] Caption = '...' TabOrder = 2 OnClick = buttonBrowseClick end end object od: TOpenDialog Filter = 'All files|*.*' Left = 32 Top = 24 end end